home *** CD-ROM | disk | FTP | other *** search
/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc B) / Acorn User China CD-ROM (UK) (Disc B).bin / STUTTGART / FROMUTS / FINDER / !Find_!RunImage < prev    next >
Unknown  |  1991-01-22  |  9.3 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0f f4 3e 21 52 | 75 6e 49 6d 61 67 65 0d |.....>!R|unImage.|
|00000010| 00 14 09 f2 69 6e 69 74 | 0d 00 1e 11 f2 73 65 61 |....init|.....sea|
|00000020| 72 63 68 77 69 6e 64 6f | 77 0d 00 28 0f f2 69 6e |rchwindo|w..(..in|
|00000030| 66 6f 77 69 6e 64 6f 77 | 0d 00 32 0d f2 6d 65 6e |fowindow|..2..men|
|00000040| 75 69 6e 69 74 0d 00 3c | 48 ee 85 f2 65 72 72 28 |uinit..<|H...err(|
|00000050| f6 24 29 3a e7 64 69 73 | 3c 3e 2d 31 20 21 62 6c |.$):.dis|<>-1 !bl|
|00000060| 6f 63 6b 25 3d 64 69 73 | 3a c8 99 22 57 69 6d 70 |ock%=dis|:.."Wimp|
|00000070| 5f 44 65 6c 65 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_DeleteW|indow",,|
|00000080| 62 6c 6f 63 6b 25 3a 64 | 69 73 3d 2d 31 0d 00 46 |block%:d|is=-1..F|
|00000090| 0d f2 63 68 65 63 6b 6e | 65 74 0d 00 50 05 f5 0d |..checkn|et..P...|
|000000a0| 00 5a 0d 62 6c 6f 63 6b | 3d 62 73 74 0d 00 64 23 |.Z.block|=bst..d#|
|000000b0| c8 99 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c 31 2c |.."Wimp_|Poll",1,|
|000000c0| 70 6f 6c 6c 25 20 b8 20 | 61 63 74 69 6f 6e 25 0d |poll% . |action%.|
|000000d0| 00 6e 0d f2 63 68 65 63 | 6b 72 61 6d 0d 00 78 10 |.n..chec|kram..x.|
|000000e0| c8 8e 20 61 63 74 69 6f | 6e 25 20 ca 0d 00 82 15 |.. actio|n% .....|
|000000f0| c9 20 31 3a f2 72 65 64 | 6f 28 21 70 6f 6c 6c 25 |. 1:.red|o(!poll%|
|00000100| 29 0d 00 8c 23 c9 20 32 | 3a f2 6f 70 65 6e 77 69 |)...#. 2|:.openwi|
|00000110| 6e 64 6f 77 32 28 70 6f | 6c 6c 25 21 34 2c 70 6f |ndow2(po|ll%!4,po|
|00000120| 6c 6c 25 29 0d 00 96 19 | c9 20 36 3a f2 6d 6f 75 |ll%)....|. 6:.mou|
|00000130| 73 65 62 75 74 74 6f 6e | 63 6c 69 63 6b 0d 00 a0 |sebutton|click...|
|00000140| 0f c9 20 39 3a f2 73 65 | 6c 65 63 74 0d 00 aa 0b |.. 9:.se|lect....|
|00000150| c9 20 31 37 2c 31 38 0d | 00 b4 15 f2 72 65 63 65 |. 17,18.|....rece|
|00000160| 69 76 65 28 61 63 74 69 | 6f 6e 25 29 0d 00 be 05 |ive(acti|on%)....|
|00000170| cb 0d 00 c8 07 fd 20 a3 | 0d 00 d2 05 e0 0d 00 dc |...... .|........|
|00000180| 0a dd f2 69 6e 69 74 0d | 00 e6 b5 de 20 70 6f 6c |...init.|.... pol|
|00000190| 6c 25 20 32 35 36 2c 6d | 65 6e 75 25 20 31 30 32 |l% 256,m|enu% 102|
|000001a0| 34 2c 62 6c 6f 63 6b 25 | 20 31 30 32 34 2c 65 72 |4,block%| 1024,er|
|000001b0| 62 6c 6b 25 20 32 35 36 | 2c 69 6e 74 20 32 30 2c |blk% 256|,int 20,|
|000001c0| 70 6e 6d 20 32 30 2c 70 | 70 73 20 32 30 2c 61 75 |pnm 20,p|ps 20,au|
|000001d0| 74 20 32 30 2c 76 65 72 | 20 32 30 2c 64 72 69 76 |t 20,ver| 20,driv|
|000001e0| 65 20 32 30 2c 53 54 20 | 32 30 2c 74 69 74 6c 65 |e 20,ST |20,title|
|000001f0| 20 31 36 30 2c 66 69 6c | 65 20 31 31 2c 66 24 28 | 160,fil|e 11,f$(|
|00000200| 38 29 2c 62 6c 6f 63 6b | 20 32 30 34 38 30 2c 62 |8),block| 20480,b|
|00000210| 6c 6f 63 6b 32 20 31 30 | 32 34 2c 70 6d 6f 64 65 |lock2 10|24,pmode|
|00000220| 20 34 2c 70 6f 75 74 20 | 34 2c 72 64 69 72 20 31 | 4,pout |4,rdir 1|
|00000230| 30 31 2c 63 68 66 6c 25 | 20 32 35 36 0d 00 f0 1a |01,chfl%| 256....|
|00000240| 24 70 6d 6f 64 65 3d 22 | 6e 6f 22 3a 24 70 6f 75 |$pmode="|no":$pou|
|00000250| 74 3d 22 6e 6f 22 0d 00 | fa 0d 24 72 64 69 72 3d |t="no"..|..$rdir=|
|00000260| 22 24 22 0d 01 04 1e 62 | 73 74 3d 62 6c 6f 63 6b |"$"....b|st=block|
|00000270| 3a 62 6d 61 78 3d 62 6c | 6f 63 6b 2b 32 30 34 38 |:bmax=bl|ock+2048|
|00000280| 30 0d 01 0e 0c 6d 6f 70 | 65 6e 25 3d a3 0d 01 18 |0....mop|en%=....|
|00000290| 0a 64 69 73 3d 2d 31 0d | 01 22 09 6d 69 25 3d 31 |.dis=-1.|.".mi%=1|
|000002a0| 0d 01 2c 0f 66 24 28 30 | 29 3d 22 52 41 4d 22 0d |..,.f$(0|)="RAM".|
|000002b0| 01 36 1b c8 99 20 22 41 | 44 46 53 5f 44 72 69 76 |.6... "A|DFS_Driv|
|000002c0| 65 73 22 20 b8 20 2c 66 | 2c 68 0d 01 40 08 51 25 |es" . ,f|,h..@.Q%|
|000002d0| 3d 30 0d 01 4a 29 e7 66 | 3c 3e 30 20 e3 4e 3d 31 |=0..J).f|<>0 .N=1|
|000002e0| b8 66 3a 66 24 28 4e 29 | 3d 22 3a 22 2b c3 28 4e |.f:f$(N)|=":"+.(N|
|000002f0| 2d 31 29 3a 51 25 2b 3d | 31 3a ed 0d 01 54 2c e7 |-1):Q%+=|1:...T,.|
|00000300| 68 3c 3e 30 20 e3 4e 3d | 31 b8 68 3a 66 24 28 51 |h<>0 .N=|1.h:f$(Q|
|00000310| 25 2b 31 29 3d 22 3a 22 | 2b c3 28 4e 2b 33 29 3a |%+1)=":"|+.(N+3):|
|00000320| 51 25 2b 3d 31 3a ed 0d | 01 5e 0a 6d 61 25 3d 51 |Q%+=1:..|.^.ma%=Q|
|00000330| 25 0d 01 68 0a 64 72 76 | 25 3d 31 0d 01 72 1d 24 |%..h.drv|%=1..r.$|
|00000340| 69 6e 74 3d 22 41 62 6f | 75 74 20 74 68 69 73 20 |int="Abo|ut this |
|00000350| 70 72 6f 67 72 61 6d 22 | 0d 01 7c 1b 24 53 54 3d |program"|..|.$ST=|
|00000360| 22 53 65 61 72 63 68 20 | 66 6f 72 20 66 69 6c 65 |"Search |for file|
|00000370| 20 3a 22 0d 01 86 1d 24 | 64 72 69 76 65 3d 66 24 | :"....$|drive=f$|
|00000380| 28 64 72 76 25 29 3a 24 | 66 69 6c 65 3d 22 2a 22 |(drv%):$|file="*"|
|00000390| 0d 01 90 13 74 66 6c 61 | 67 25 3d 26 37 30 30 30 |....tfla|g%=&7000|
|000003a0| 30 30 31 0d 01 9a 30 c8 | 99 22 57 69 6d 70 5f 49 |001...0.|."Wimp_I|
|000003b0| 6e 69 74 69 61 6c 69 73 | 65 22 2c 32 30 30 2c 26 |nitialis|e",200,&|
|000003c0| 34 42 35 33 34 31 35 34 | 2c 22 46 69 6c 65 46 69 |4B534154|,"FileFi|
|000003d0| 6e 64 22 0d 01 a4 0d 21 | 70 6f 6c 6c 25 3d 2d 31 |nd"....!|poll%=-1|
|000003e0| 0d 01 ae 0d 70 6f 6c 6c | 25 21 34 3d 30 0d 01 b8 |....poll|%!4=0...|
|000003f0| 0d 70 6f 6c 6c 25 21 38 | 3d 30 0d 01 c2 0f 70 6f |.poll%!8|=0....po|
|00000400| 6c 6c 25 21 31 32 3d 36 | 39 0d 01 cc 0f 70 6f 6c |ll%!12=6|9....pol|
|00000410| 6c 25 21 31 36 3d 36 38 | 0d 01 d6 12 70 6f 6c 6c |l%!16=68|....poll|
|00000420| 25 21 32 30 3d 26 33 30 | 30 32 0d 01 e0 17 24 28 |%!20=&30|02....$(|
|00000430| 70 6f 6c 6c 25 2b 32 34 | 29 3d 22 21 46 69 6e 64 |poll%+24|)="!Find|
|00000440| 22 0d 01 ea 26 c8 99 22 | 57 69 6d 70 5f 43 72 65 |"...&.."|Wimp_Cre|
|00000450| 61 74 65 49 63 6f 6e 22 | 2c 2c 70 6f 6c 6c 25 20 |ateIcon"|,,poll% |
|00000460| b8 20 69 63 6f 6e 25 0d | 01 f4 05 e1 0d 01 fe 11 |. icon%.|........|
|00000470| dd f2 72 65 63 65 69 76 | 65 28 72 25 29 0d 02 08 |..receiv|e(r%)...|
|00000480| 0c 74 65 78 74 24 3d 22 | 22 0d 02 12 11 c8 8e 20 |.text$="|"...... |
|00000490| 70 6f 6c 6c 25 21 31 36 | 20 ca 0d 02 1c 13 c9 20 |poll%!16| ...... |
|000004a0| 30 3a f2 73 68 75 74 64 | 6f 77 6e 3a e0 0d 02 26 |0:.shutd|own:...&|
|000004b0| 0a c9 20 26 35 30 32 0d | 02 30 11 c8 8e 20 70 6f |.. &502.|.0... po|
|000004c0| 6c 6c 25 21 33 32 20 ca | 0d 02 3a 4f c9 20 2d 32 |ll%!32 .|..:O. -2|
|000004d0| 3a 74 65 78 74 24 3d 22 | 54 68 69 73 20 69 73 20 |:text$="|This is |
|000004e0| 74 68 65 20 46 69 6c 65 | 20 46 69 6e 64 65 72 20 |the File| Finder |
|000004f0| 69 63 6f 6e 7c 4d 43 6c | 69 63 6b 20 74 68 65 20 |icon|MCl|ick the |
|00000500| 6d 65 6e 75 20 62 75 74 | 74 6f 6e 20 66 6f 72 20 |menu but|ton for |
|00000510| 61 20 6d 65 6e 75 22 0d | 02 44 0d c9 20 73 65 61 |a menu".|.D.. sea|
|00000520| 72 63 68 25 0d 02 4e 11 | c8 8e 20 70 6f 6c 6c 25 |rch%..N.|.. poll%|
|00000530| 21 33 36 20 ca 0d 02 58 | 40 c9 20 32 3a 74 65 78 |!36 ...X|@. 2:tex|
|00000540| 74 24 3d 22 54 68 69 73 | 20 69 63 6f 6e 20 73 68 |t$="This| icon sh|
|00000550| 6f 77 73 20 74 68 65 20 | 64 72 69 76 65 20 74 68 |ows the |drive th|
|00000560| 61 74 20 69 73 20 74 6f | 20 62 65 20 73 65 61 72 |at is to| be sear|
|00000570| 63 68 65 64 22 0d 02 62 | 6f c9 20 33 2c 34 3a 74 |ched"..b|o. 3,4:t|
|00000580| 65 78 74 24 3d 22 43 6c | 69 63 6b 20 6f 6e 20 74 |ext$="Cl|ick on t|
|00000590| 68 65 20 61 72 72 6f 77 | 73 20 74 6f 20 63 68 61 |he arrow|s to cha|
|000005a0| 6e 67 65 20 74 68 65 20 | 64 72 69 76 65 20 6e 75 |nge the |drive nu|
|000005b0| 6d 62 65 72 20 6f 72 20 | 73 65 6c 65 63 74 20 61 |mber or |select a|
|000005c0| 20 52 41 4d 20 64 69 73 | 63 20 6f 72 20 4e 65 74 | RAM dis|c or Net|
|000005d0| 77 6f 72 6b 20 28 69 66 | 20 61 76 61 69 6c 61 62 |work (if| availab|
|000005e0| 6c 65 29 22 0d 02 6c 63 | c9 20 35 3a 74 65 78 74 |le)"..lc|. 5:text|
|000005f0| 24 3d 22 43 6c 69 63 6b | 20 68 65 72 65 20 74 6f |$="Click| here to|
|00000600| 20 64 69 73 70 6c 61 79 | 20 61 20 63 61 72 65 74 | display| a caret|
|00000610| 2c 20 61 6e 64 20 74 68 | 65 6e 20 65 6e 74 65 72 |, and th|en enter|
|00000620| 20 74 68 65 20 77 69 6c | 64 63 61 72 64 65 64 20 | the wil|dcarded |
|00000630| 66 69 6c 65 6e 61 6d 65 | 20 74 6f 20 62 65 20 6d |filename| to be m|
|00000640| 61 74 63 68 65 64 22 0d | 02 76 31 c9 20 36 3a 74 |atched".|.v1. 6:t|
|00000650| 65 78 74 24 3d 22 43 6c | 69 63 6b 20 27 4f 4b 27 |ext$="Cl|ick 'OK'|
|00000660| 20 74 6f 20 69 6e 69 74 | 69 61 74 65 20 74 68 65 | to init|iate the|
|00000670| 20 73 65 61 72 63 68 22 | 0d 02 80 5a c9 20 39 3a | search"|...Z. 9:|
|00000680| 74 65 78 74 24 3d 22 43 | 6c 69 63 6b 20 68 65 72 |text$="C|lick her|
|00000690| 65 20 74 6f 20 65 6e 61 | 62 6c 65 2f 64 69 73 61 |e to ena|ble/disa|
|000006a0| 62 6c 65 20 70 61 67 65 | 64 20 6d 6f 64 65 20 77 |ble page|d mode w|
|000006b0| 68 65 6e 20 66 69 6c 65 | 6e 61 6d 65 73 20 61 72 |hen file|names ar|
|000006c0| 65 20 62 65 69 6e 67 20 | 64 69 73 70 6c 61 79 65 |e being |displaye|
|000006d0| 64 22 0d 02 8a 6d c9 20 | 31 30 3a 74 65 78 74 24 |d"...m. |10:text$|
|000006e0| 3d 22 43 6c 69 63 6b 20 | 68 65 72 65 20 74 6f 20 |="Click |here to |
|000006f0| 65 6e 61 62 6c 65 2f 64 | 69 73 61 62 6c 65 20 61 |enable/d|isable a|
|00000700| 20 70 72 69 6e 74 6f 75 | 74 20 6f 66 20 74 68 65 | printou|t of the|
|00000710| 20 66 69 6c 65 73 20 6d | 61 74 63 68 65 64 20 61 | files m|atched a|
|00000720| 67 61 69 6e 73 74 20 74 | 68 65 20 77 69 6c 64 63 |gainst t|he wildc|
|00000730| 61 72 64 65 64 20 66 69 | 6c 65 6e 61 6d 65 22 0d |arded fi|lename".|
|00000740| 02 94 6b c9 20 31 32 3a | 74 65 78 74 24 3d 22 43 |..k. 12:|text$="C|
|00000750| 6c 69 63 6b 20 68 65 72 | 65 20 74 6f 20 64 69 73 |lick her|e to dis|
|00000760| 70 6c 61 79 20 61 20 63 | 61 72 65 74 2c 20 61 6e |play a c|aret, an|
|00000770| 64 20 74 68 65 6e 20 65 | 6e 74 65 72 20 74 68 65 |d then e|nter the|
|00000780| 20 72 6f 6f 74 20 64 69 | 72 65 63 74 6f 72 79 20 | root di|rectory |
|00000790| 66 6f 72 20 74 68 65 20 | 73 65 61 72 63 68 20 28 |for the |search (|
|000007a0| 69 66 20 6b 6e 6f 77 6e | 29 22 0d 02 9e 05 cb 0d |if known|)"......|
|000007b0| 02 a8 56 c9 20 69 6e 66 | 6f 25 3a 74 65 78 74 24 |..V. inf|o%:text$|
|000007c0| 3d 22 54 68 69 73 20 77 | 69 6e 64 6f 77 20 64 69 |="This w|indow di|
|000007d0| 73 70 6c 61 79 73 20 69 | 6e 66 6f 72 6d 61 74 69 |splays i|nformati|
|000007e0| 6f 6e 20 61 62 6f 75 74 | 20 74 68 65 20 46 69 6c |on about| the Fil|
|000007f0| 65 20 46 69 6e 64 65 72 | 20 61 70 70 6c 69 63 61 |e Finder| applica|
|00000800| 74 69 6f 6e 22 0d 02 b2 | 05 cb 0d 02 bc 23 70 6f |tion"...|.....#po|
|00000810| 6c 6c 25 21 30 3d 28 28 | 28 32 30 2b a9 74 65 78 |ll%!0=((|(20+.tex|
|00000820| 74 24 2b 31 29 81 34 29 | 2a 34 29 2b 34 0d 02 c6 |t$+1).4)|*4)+4...|
|00000830| 0e 70 6f 6c 6c 25 21 34 | 3d 31 37 0d 02 d0 14 70 |.poll%!4|=17....p|
|00000840| 6f 6c 6c 25 21 31 32 3d | 70 6f 6c 6c 25 21 38 0d |oll%!12=|poll%!8.|
|00000850| 02 da 11 70 6f 6c 6c 25 | 21 31 36 3d 26 35 30 33 |...poll%|!16=&503|
|00000860| 0d 02 e4 2b 24 28 70 6f | 6c 6c 25 2b 32 30 29 3d |...+$(po|ll%+20)=|
|00000870| 74 65 78 74 24 3a 24 28 | 70 6f 6c 6c 25 2b 32 31 |text$:$(|poll%+21|
|00000880| 2b a9 74 65 78 74 24 29 | 3d bd 30 0d 02 ee 21 c8 |+.text$)|=.0...!.|
|00000890| 99 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 |."Wimp_S|endMessa|
|000008a0| 67 65 22 2c 31 37 2c 70 | 6f 6c 6c 25 0d 02 f8 05 |ge",17,p|oll%....|
|000008b0| cb 0d 03 02 05 e1 0d 03 | 0c 0e dd f2 73 68 75 74 |........|....shut|
|000008c0| 64 6f 77 6e 0d 03 16 16 | c8 99 22 57 69 6d 70 5f |down....|.."Wimp_|
|000008d0| 43 6c 6f 73 65 44 6f 77 | 6e 22 0d 03 20 05 e1 0d |CloseDow|n".. ...|
|000008e0| 03 2a 5f dd a4 63 72 65 | 61 74 65 77 69 6e 64 6f |.*_..cre|atewindo|
|000008f0| 77 28 74 69 74 6c 65 2c | 66 6c 61 67 25 2c 66 67 |w(title,|flag%,fg|
|00000900| 63 6f 6c 25 2c 62 67 63 | 6f 6c 25 2c 74 77 61 74 |col%,bgc|ol%,twat|
|00000910| 78 25 2c 74 77 61 74 79 | 25 2c 76 77 61 62 78 25 |x%,twaty|%,vwabx%|
|00000920| 2c 76 77 61 62 79 25 2c | 76 77 61 74 78 25 2c 76 |,vwaby%,|vwatx%,v|
|00000930| 77 61 74 79 25 2c 6e 69 | 63 6f 6e 73 25 29 0d 03 |waty%,ni|cons%)..|
|00000940| 34 0d ea 20 68 61 6e 64 | 6c 65 25 0d 03 3e 43 21 |4.. hand|le%..>C!|
|00000950| 62 6c 6f 63 6b 25 3d 76 | 77 61 62 78 25 3a 62 6c |block%=v|wabx%:bl|
|00000960| 6f 63 6b 25 21 34 3d 76 | 77 61 62 79 25 3a 62 6c |ock%!4=v|waby%:bl|
|00000970| 6f 63 6b 25 21 38 3d 76 | 77 61 74 78 25 3a 62 6c |ock%!8=v|watx%:bl|
|00000980| 6f 63 6b 25 21 31 32 3d | 76 77 61 74 79 25 0d 03 |ock%!12=|vwaty%..|
|00000990| 48 3d 62 6c 6f 63 6b 25 | 21 31 36 3d 30 3a 62 6c |H=block%|!16=0:bl|
|000009a0| 6f 63 6b 25 21 32 30 3d | 74 77 61 74 79 25 3a 62 |ock%!20=|twaty%:b|
|000009b0| 6c 6f 63 6b 25 21 32 34 | 3d 2d 31 3a 62 6c 6f 63 |lock%!24|=-1:bloc|
|000009c0| 6b 25 21 32 38 3d 66 6c | 61 67 25 0d 03 52 3d 62 |k%!28=fl|ag%..R=b|
|000009d0| 6c 6f 63 6b 25 3f 33 32 | 3d 37 3a 62 6c 6f 63 6b |lock%?32|=7:block|
|000009e0| 25 3f 33 33 3d 32 3a 62 | 6c 6f 63 6b 25 3f 33 34 |%?33=2:b|lock%?34|
|000009f0| 3d 66 67 63 6f 6c 25 3a | 62 6c 6f 63 6b 25 3f 33 |=fgcol%:|block%?3|
|00000a00| 35 3d 62 67 63 6f 6c 25 | 0d 03 5c 34 62 6c 6f 63 |5=bgcol%|..\4bloc|
|00000a10| 6b 25 3f 33 36 3d 33 3a | 62 6c 6f 63 6b 25 3f 33 |k%?36=3:|block%?3|
|00000a20| 37 3d 31 3a 62 6c 6f 63 | 6b 25 3f 33 38 3d 31 32 |7=1:bloc|k%?38=12|
|00000a30| 3a 62 6c 6f 63 6b 25 3f | 33 39 3d 30 0d 03 66 3d |:block%?|39=0..f=|
|00000a40| 62 6c 6f 63 6b 25 21 34 | 30 3d 30 3a 62 6c 6f 63 |block%!4|0=0:bloc|
|00000a50| 6b 25 21 34 34 3d 30 3a | 62 6c 6f 63 6b 25 21 34 |k%!44=0:|block%!4|
|00000a60| 38 3d 74 77 61 74 78 25 | 3a 62 6c 6f 63 6b 25 21 |8=twatx%|:block%!|
|00000a70| 35 32 3d 74 77 61 74 79 | 25 0d 03 70 40 62 6c 6f |52=twaty|%..p@blo|
|00000a80| 63 6b 25 21 35 36 3d 26 | 32 44 2b 28 31 3c 3c 38 |ck%!56=&|2D+(1<<8|
|00000a90| 29 3a 62 6c 6f 63 6b 25 | 21 36 30 3d 26 33 30 30 |):block%|!60=&300|
|00000aa0| 30 3a 62 6c 6f 63 6b 25 | 21 36 34 3d 30 3a 62 6c |0:block%|!64=0:bl|
|00000ab0| 6f 63 6b 25 21 36 38 3d | 31 0d 03 7a 44 62 6c 6f |ock%!68=|1..zDblo|
|00000ac0| 63 6b 25 21 37 32 3d 74 | 69 74 6c 65 3a 62 6c 6f |ck%!72=t|itle:blo|
|00000ad0| 63 6b 25 21 37 36 3d 2d | 31 3a 62 6c 6f 63 6b 25 |ck%!76=-|1:block%|
|00000ae0| 21 38 30 3d a9 24 74 69 | 74 6c 65 3a 62 6c 6f 63 |!80=.$ti|tle:bloc|
|00000af0| 6b 25 21 38 34 3d 6e 69 | 63 6f 6e 73 25 0d 03 84 |k%!84=ni|cons%...|
|00000b00| 35 c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |5.."Wimp|_CreateW|
|00000b10| 69 6e 64 6f 77 22 2c 30 | 2c 62 6c 6f 63 6b 25 20 |indow",0|,block% |
|00000b20| b8 20 68 61 6e 64 6c 65 | 25 3a 3d 68 61 6e 64 6c |. handle|%:=handl|
|00000b30| 65 25 0d 03 8e 05 e0 0d | 03 98 18 dd a4 63 72 65 |e%......|.....cre|
|00000b40| 61 74 65 6d 65 6e 75 28 | 6d 62 25 2c 74 24 29 0d |atemenu(|mb%,t$).|
|00000b50| 03 a2 38 ea 20 6e 65 77 | 24 2c 70 74 72 25 2c 73 |..8. new|$,ptr%,s|
|00000b60| 68 61 64 65 25 2c 74 69 | 63 6b 25 2c 64 6f 74 74 |hade%,ti|ck%,dott|
|00000b70| 65 64 25 2c 73 75 62 6d | 65 6e 75 25 2c 77 72 69 |ed%,subm|enu%,wri|
|00000b80| 74 65 61 62 6c 65 25 0d | 03 ac 21 6e 75 6d 6f 66 |teable%.|..!numof|
|00000b90| 69 74 65 6d 73 25 3d bb | c0 74 24 2c 31 29 3a 74 |items%=.|.t$,1):t|
|00000ba0| 24 3d c1 74 24 2c 32 29 | 0d 03 b6 23 6e 65 78 74 |$=.t$,2)|...#next|
|00000bb0| 6d 65 6e 75 25 3d 6d 62 | 25 2b 32 38 2b 32 34 2a |menu%=mb|%+28+24*|
|00000bc0| 6e 75 6d 6f 66 69 74 65 | 6d 73 25 0d 03 c0 2b 24 |numofite|ms%...+$|
|00000bd0| 6d 62 25 3d c0 74 24 2c | a7 74 24 2c 22 7c 22 29 |mb%=.t$,|.t$,"|")|
|00000be0| 2d 31 29 3a 74 24 3d c1 | 74 24 2c a7 74 24 2c 22 |-1):t$=.|t$,.t$,"|
|00000bf0| 7c 22 29 2b 31 29 0d 03 | ca 21 6d 62 25 3f 31 32 ||")+1)..|.!mb%?12|
|00000c00| 3d 37 3a f4 20 74 69 74 | 6c 65 20 66 67 72 6e 64 |=7:. tit|le fgrnd|
|00000c10| 20 63 6f 6c 6f 75 72 0d | 03 d4 22 6d 62 25 3f 31 | colour.|.."mb%?1|
|00000c20| 33 3d 32 3a f4 20 74 69 | 74 6c 65 20 62 6b 67 72 |3=2:. ti|tle bkgr|
|00000c30| 6e 64 20 63 6f 6c 6f 75 | 72 0d 03 de 25 6d 62 25 |nd colou|r...%mb%|
|00000c40| 3f 31 34 3d 37 3a f4 20 | 57 6f 72 6b 20 61 72 65 |?14=7:. |Work are|
|00000c50| 61 20 66 67 72 6e 64 20 | 63 6f 6c 6f 75 72 0d 03 |a fgrnd |colour..|
|00000c60| e8 26 6d 62 25 3f 31 35 | 3d 30 3a f4 20 57 6f 72 |.&mb%?15|=0:. Wor|
|00000c70| 6b 20 61 72 65 61 20 62 | 6b 67 72 6e 64 20 63 6f |k area b|kgrnd co|
|00000c80| 6c 6f 75 72 0d 03 f2 1b | 6d 62 25 21 31 36 3d 32 |lour....|mb%!16=2|
|00000c90| 30 30 3a f4 20 4d 65 6e | 75 20 77 69 64 74 68 0d |00:. Men|u width.|
|00000ca0| 03 fc 1e 6d 62 25 21 32 | 30 3d 34 30 3a f4 20 68 |...mb%!2|0=40:. h|
|00000cb0| 65 69 67 68 74 20 6f 66 | 20 74 65 78 74 0d 04 06 |eight of| text...|
|00000cc0| 22 6d 62 25 21 32 34 3d | 31 30 3a f4 20 73 70 61 |"mb%!24=|10:. spa|
|00000cd0| 63 65 20 27 74 77 65 65 | 6e 20 6c 69 6e 65 73 0d |ce 'twee|n lines.|
|00000ce0| 04 10 0f 70 74 72 25 3d | 6d 62 25 2b 32 38 0d 04 |...ptr%=|mb%+28..|
|00000cf0| 1a 39 f5 3a 73 68 61 64 | 65 25 3d 30 3a 74 69 63 |.9.:shad|e%=0:tic|
|00000d00| 6b 25 3d 30 3a 64 6f 74 | 74 65 64 25 3d 30 3a 77 |k%=0:dot|ted%=0:w|
|00000d10| 72 69 74 65 61 62 6c 65 | 25 3d 30 3a 73 75 62 6d |riteable|%=0:subm|
|00000d20| 65 6e 75 25 3d 2d 31 0d | 04 24 11 e7 c0 74 24 2c |enu%=-1.|.$...t$,|
|00000d30| 31 29 3d 22 5b 22 20 8c | 0d 04 2e 22 74 24 3d c1 |1)="[" .|..."t$=.|
|00000d40| 74 24 2c 32 29 3a 6e 65 | 77 3d a0 c0 74 24 2c a7 |t$,2):ne|w=..t$,.|
|00000d50| 74 24 2c 22 5d 22 29 2d | 31 29 0d 04 38 23 74 24 |t$,"]")-|1)..8#t$|
|00000d60| 3d c1 74 24 2c a7 74 24 | 2c 22 5d 22 29 2b 31 29 |=.t$,.t$|,"]")+1)|
|00000d70| 3a 73 75 62 6d 65 6e 75 | 25 3d 6e 65 77 0d 04 42 |:submenu|%=new..B|
|00000d80| 05 cd 0d 04 4c 26 e7 c0 | 74 24 2c 31 29 3d 22 2e |....L&..|t$,1)=".|
|00000d90| 22 20 74 24 3d c1 74 24 | 2c 32 29 3a f4 20 44 6f |" t$=.t$|,2):. Do|
|00000da0| 20 6e 6f 74 68 69 6e 67 | 0d 04 56 28 e7 c0 74 24 | nothing|..V(..t$|
|00000db0| 2c 31 29 3d 22 40 22 20 | 73 68 61 64 65 25 3d 26 |,1)="@" |shade%=&|
|00000dc0| 34 30 30 30 30 30 3a 74 | 24 3d c1 74 24 2c 32 29 |400000:t|$=.t$,2)|
|00000dd0| 0d 04 60 21 e7 c0 74 24 | 2c 31 29 3d 22 23 22 20 |..`!..t$|,1)="#" |
|00000de0| 74 69 63 6b 25 3d 31 3a | 74 24 3d c1 74 24 2c 32 |tick%=1:|t$=.t$,2|
|00000df0| 29 0d 04 6a 23 e7 c0 74 | 24 2c 31 29 3d 22 3a 22 |)..j#..t|$,1)=":"|
|00000e00| 20 64 6f 74 74 65 64 25 | 3d 32 3a 74 24 3d c1 74 | dotted%|=2:t$=.t|
|00000e10| 24 2c 32 29 0d 04 74 26 | e7 c0 74 24 2c 31 29 3d |$,2)..t&|..t$,1)=|
|00000e20| 22 5e 22 20 77 72 69 74 | 65 61 62 6c 65 25 3d 34 |"^" writ|eable%=4|
|00000e30| 3a 74 24 3d c1 74 24 2c | 32 29 0d 04 7e 0f 67 25 |:t$=.t$,|2)..~.g%|
|00000e40| 3d a7 74 24 2c 22 7c 22 | 29 0d 04 88 11 e7 77 72 |=.t$,"|"|).....wr|
|00000e50| 69 74 65 61 62 6c 65 25 | 20 8c 0d 04 92 2f 69 25 |iteable%| ..../i%|
|00000e60| 3d a7 74 24 2c 22 2c 22 | 29 3a 70 74 72 25 21 31 |=.t$,","|):ptr%!1|
|00000e70| 32 3d a0 c0 74 24 2c 69 | 25 2d 31 29 3a 74 24 3d |2=..t$,i|%-1):t$=|
|00000e80| c1 74 24 2c 69 25 2b 31 | 29 0d 04 9c 0e 70 74 72 |.t$,i%+1|)....ptr|
|00000e90| 25 21 31 36 3d 2d 31 0d | 04 a6 1c 70 74 72 25 21 |%!16=-1.|...ptr%!|
|00000ea0| 32 30 3d a0 c0 74 24 2c | a7 74 24 2c 22 7c 22 29 |20=..t$,|.t$,"|")|
|00000eb0| 2d 31 29 0d 04 b0 3c 6d | 62 25 21 31 36 3d a4 67 |-1)...<m|b%!16=.g|
|00000ec0| 72 65 61 74 65 72 28 6d | 62 25 21 31 36 2c 34 2b |reater(m|b%!16,4+|
|00000ed0| 31 36 2a 70 74 72 25 21 | 32 30 29 3a f4 20 77 69 |16*ptr%!|20):. wi|
|00000ee0| 64 74 68 20 6f 66 20 6e | 65 77 20 6d 65 6e 75 0d |dth of n|ew menu.|
|00000ef0| 04 ba 05 cc 0d 04 c4 18 | 24 28 70 74 72 25 2b 31 |........|$(ptr%+1|
|00000f00| 32 29 3d c0 74 24 2c 67 | 25 2d 31 29 0d 04 ce 05 |2)=.t$,g|%-1)....|
|00000f10| cd 0d 04 d8 10 74 24 3d | c1 74 24 2c 67 25 2b 31 |.....t$=|.t$,g%+1|
|00000f20| 29 0d 04 e2 4e 21 70 74 | 72 25 3d 74 69 63 6b 25 |)...N!pt|r%=tick%|
|00000f30| 20 84 20 64 6f 74 74 65 | 64 25 20 84 20 77 72 69 | . dotte|d% . wri|
|00000f40| 74 65 61 62 6c 65 25 20 | 84 20 28 26 38 30 20 80 |teable% |. (&80 .|
|00000f50| 20 28 74 24 3d 22 22 29 | 29 3a f4 20 26 38 30 20 | (t$="")|):. &80 |
|00000f60| 6d 61 72 6b 73 20 6c 61 | 73 74 20 69 74 65 6d 0d |marks la|st item.|
|00000f70| 04 ec 13 70 74 72 25 21 | 34 3d 73 75 62 6d 65 6e |...ptr%!|4=submen|
|00000f80| 75 25 0d 04 f6 3f f4 70 | 74 72 25 21 38 3d 26 31 |u%...?.p|tr%!8=&1|
|00000f90| 30 30 32 31 20 4f 52 20 | 73 68 61 64 65 25 20 4f |0021 OR |shade% O|
|00000fa0| 52 20 77 72 69 74 65 61 | 62 6c 65 25 3c 3c 36 20 |R writea|ble%<<6 |
|00000fb0| 4f 52 20 30 3c 3c 32 34 | 20 4f 52 20 37 3c 3c 32 |OR 0<<24| OR 7<<2|
|00000fc0| 38 0d 05 00 2c 70 74 72 | 25 21 38 3d 26 37 30 30 |8...,ptr|%!8=&700|
|00000fd0| 30 30 30 39 20 84 20 73 | 68 61 64 65 25 20 84 20 |0009 . s|hade% . |
|00000fe0| 77 72 69 74 65 61 62 6c | 65 25 3c 3c 36 0d 05 0a |writeabl|e%<<6...|
|00000ff0| 0c 70 74 72 25 2b 3d 32 | 34 0d 05 14 0a fd 74 24 |.ptr%+=2|4.....t$|
|00001000| 3d 22 22 0d 05 1e 08 3d | 6d 62 25 0d 05 28 2e dd |=""....=|mb%..(..|
|00001010| f2 6d 6f 75 73 65 62 75 | 74 74 6f 6e 63 6c 69 63 |.mousebu|ttonclic|
|00001020| 6b 3a ea 20 68 61 6e 64 | 6c 65 25 2c 62 75 74 74 |k:. hand|le%,butt|
|00001030| 6f 6e 25 2c 69 63 6f 6e | 25 0d 05 32 13 62 75 74 |on%,icon|%..2.but|
|00001040| 74 6f 6e 25 3d 70 6f 6c | 6c 25 21 38 0d 05 3c 14 |ton%=pol|l%!8..<.|
|00001050| 68 61 6e 64 6c 65 25 3d | 70 6f 6c 6c 25 21 31 32 |handle%=|poll%!12|
|00001060| 0d 05 46 12 69 63 6f 6e | 25 3d 70 6f 6c 6c 25 21 |..F.icon|%=poll%!|
|00001070| 31 36 0d 05 50 22 6d 6f | 75 73 65 78 25 3d 21 70 |16..P"mo|usex%=!p|
|00001080| 6f 6c 6c 25 3a 6d 6f 75 | 73 65 79 25 3d 70 6f 6c |oll%:mou|sey%=pol|
|00001090| 6c 25 21 34 0d 05 5a 47 | e7 62 75 74 74 6f 6e 25 |l%!4..ZG|.button%|
|000010a0| 3d 32 20 80 20 68 61 6e | 64 6c 65 25 3d 2d 32 20 |=2 . han|dle%=-2 |
|000010b0| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d |.. "Wimp|_CreateM|
|000010c0| 65 6e 75 22 2c 30 2c 6d | 65 6e 75 25 2c 6d 6f 75 |enu",0,m|enu%,mou|
|000010d0| 73 65 78 25 2d 38 38 2c | 32 39 36 0d 05 64 17 e7 |sex%-88,|296..d..|
|000010e0| 20 68 61 6e 64 6c 65 25 | 3d 73 65 61 72 63 68 25 | handle%|=search%|
|000010f0| 20 8c 0d 05 6e 0e c8 8e | 20 69 63 6f 6e 25 20 ca | ...n...| icon% .|
|00001100| 0d 05 78 07 c9 20 33 0d | 05 82 1e 64 72 76 25 2d |..x.. 3.|...drv%-|
|00001110| 3d 31 3a e7 64 72 76 25 | 3c 6d 69 25 20 64 72 76 |=1:.drv%|<mi% drv|
|00001120| 25 3d 6d 61 25 0d 05 8c | 13 24 64 72 69 76 65 3d |%=ma%...|.$drive=|
|00001130| 66 24 28 64 72 76 25 29 | 0d 05 96 0a f2 72 73 72 |f$(drv%)|.....rsr|
|00001140| 63 68 0d 05 a0 07 c9 20 | 34 0d 05 aa 1e 64 72 76 |ch..... |4....drv|
|00001150| 25 2b 3d 31 3a e7 64 72 | 76 25 3e 6d 61 25 20 64 |%+=1:.dr|v%>ma% d|
|00001160| 72 76 25 3d 6d 69 25 0d | 05 b4 13 24 64 72 69 76 |rv%=mi%.|...$driv|
|00001170| 65 3d 66 24 28 64 72 76 | 25 29 0d 05 be 0a f2 72 |e=f$(drv|%).....r|
|00001180| 73 72 63 68 0d 05 c8 07 | c9 20 36 0d 05 d2 09 f2 |srch....|. 6.....|
|00001190| 66 69 6e 64 0d 05 dc 07 | c9 20 39 0d 05 e6 2b e7 |find....|. 9...+.|
|000011a0| 24 70 6d 6f 64 65 3d 22 | 6e 6f 22 20 24 70 6d 6f |$pmode="|no" $pmo|
|000011b0| 64 65 3d 22 79 65 73 22 | 20 8b 20 24 70 6d 6f 64 |de="yes"| . $pmod|
|000011c0| 65 3d 22 6e 6f 22 0d 05 | f0 12 f2 72 65 64 6f 28 |e="no"..|...redo(|
|000011d0| 73 65 61 72 63 68 25 29 | 0d 05 fa 08 c9 20 31 30 |search%)|..... 10|
|000011e0| 0d 06 04 28 e7 24 70 6f | 75 74 3d 22 6e 6f 22 20 |...(.$po|ut="no" |
|000011f0| 24 70 6f 75 74 3d 22 79 | 65 73 22 20 8b 20 24 70 |$pout="y|es" . $p|
|00001200| 6f 75 74 3d 22 6e 6f 22 | 0d 06 0e 12 f2 72 65 64 |out="no"|.....red|
|00001210| 6f 28 73 65 61 72 63 68 | 25 29 0d 06 18 05 cb 0d |o(search|%)......|
|00001220| 06 22 05 cd 0d 06 2c 05 | e1 0d 06 36 22 dd a4 67 |."....,.|...6"..g|
|00001230| 72 65 61 74 65 72 28 61 | 25 2c 62 25 29 3a e7 61 |reater(a|%,b%):.a|
|00001240| 25 3e 62 25 3d 61 25 8b | 3d 62 25 0d 06 40 1d dd |%>b%=a%.|=b%..@..|
|00001250| f2 74 77 61 6f 72 69 67 | 69 6e 28 62 25 2c f8 20 |.twaorig|in(b%,. |
|00001260| 78 25 2c f8 20 79 25 29 | 0d 06 4a 32 78 25 3d 62 |x%,. y%)|..J2x%=b|
|00001270| 6c 6f 63 6b 25 21 34 2d | 62 6c 6f 63 6b 25 21 32 |lock%!4-|block%!2|
|00001280| 30 3a 79 25 3d 62 6c 6f | 63 6b 25 21 31 36 2d 62 |0:y%=blo|ck%!16-b|
|00001290| 6c 6f 63 6b 25 21 32 34 | 3a e1 0d 06 54 0e dd f2 |lock%!24|:...T...|
|000012a0| 6d 65 6e 75 69 6e 69 74 | 0d 06 5e 40 6d 65 6e 75 |menuinit|..^@menu|
|000012b0| 24 3d 22 33 46 69 6c 65 | 46 69 6e 64 7c 5b 69 6e |$="3File|Find|[in|
|000012c0| 66 6f 25 5d 3a 49 6e 66 | 6f 72 6d 61 74 69 6f 6e |fo%]:Inf|ormation|
|000012d0| 7c 5b 73 65 61 72 63 68 | 25 5d 3a 53 65 61 72 63 ||[search|%]:Searc|
|000012e0| 68 7c 51 75 69 74 7c 22 | 0d 06 68 1f 6a 25 3d a4 |h|Quit|"|..h.j%=.|
|000012f0| 63 72 65 61 74 65 6d 65 | 6e 75 28 6d 65 6e 75 25 |createme|nu(menu%|
|00001300| 2c 6d 65 6e 75 24 29 0d | 06 72 05 e1 0d 06 7c 0c |,menu$).|.r....|.|
|00001310| dd f2 73 65 6c 65 63 74 | 0d 06 86 35 c8 99 22 57 |..select|...5.."W|
|00001320| 69 6d 70 5f 47 65 74 50 | 6f 69 6e 74 65 72 49 6e |imp_GetP|ointerIn|
|00001330| 66 6f 22 2c 2c 62 6c 6f | 63 6b 25 3a 41 25 3d 28 |fo",,blo|ck%:A%=(|
|00001340| 62 6c 6f 63 6b 25 21 38 | 29 20 80 20 31 0d 06 90 |block%!8|) . 1...|
|00001350| 36 c8 99 22 57 69 6d 70 | 5f 44 65 63 6f 64 65 4d |6.."Wimp|_DecodeM|
|00001360| 65 6e 75 22 2c 2c 6d 65 | 6e 75 25 2c 70 6f 6c 6c |enu",,me|nu%,poll|
|00001370| 25 2c c4 32 30 30 2c 22 | 20 22 29 20 b8 20 2c 2c |%,.200,"| ") . ,,|
|00001380| 2c 61 24 0d 06 9a 0c e7 | 61 24 3d 22 22 20 e1 0d |,a$.....|a$="" ..|
|00001390| 06 a4 1a e7 61 24 3d 22 | 51 75 69 74 22 20 f2 73 |....a$="|Quit" .s|
|000013a0| 68 75 74 64 6f 77 6e 3a | e1 0d 06 ae 34 e7 20 41 |hutdown:|....4. A|
|000013b0| 25 20 c8 99 22 57 69 6d | 70 5f 43 72 65 61 74 65 |% .."Wim|p_Create|
|000013c0| 4d 65 6e 75 22 2c 2c 6d | 65 6e 75 25 2c 21 62 6c |Menu",,m|enu%,!bl|
|000013d0| 6f 63 6b 25 2c 62 6c 6f | 63 6b 25 21 34 0d 06 b8 |ock%,blo|ck%!4...|
|000013e0| 05 e1 0d 06 c2 19 dd f2 | 72 65 64 6f 28 48 25 29 |........|redo(H%)|
|000013f0| 3a 21 62 6c 6f 63 6b 25 | 3d 48 25 0d 06 cc 2a c8 |:!block%|=H%...*.|
|00001400| 99 22 57 69 6d 70 5f 52 | 65 64 72 61 77 57 69 6e |."Wimp_R|edrawWin|
|00001410| 64 6f 77 22 2c 30 2c 62 | 6c 6f 63 6b 25 20 b8 20 |dow",0,b|lock% . |
|00001420| 6d 6f 72 65 25 0d 06 d6 | 0c c8 95 20 6d 6f 72 65 |more%...|... more|
|00001430| 25 0d 06 e0 05 da 0d 06 | ea 2a c8 99 22 57 69 6d |%.......|.*.."Wim|
|00001440| 70 5f 47 65 74 52 65 63 | 74 61 6e 67 6c 65 22 2c |p_GetRec|tangle",|
|00001450| 30 2c 62 6c 6f 63 6b 25 | 20 b8 20 6d 6f 72 65 25 |0,block%| . more%|
|00001460| 0d 06 f4 05 ce 0d 06 fe | 05 e1 0d 07 08 21 dd f2 |........|.....!..|
|00001470| 57 69 63 6f 6e 28 4e 25 | 2c 58 31 2c 59 31 2c 58 |Wicon(N%|,X1,Y1,X|
|00001480| 32 2c 59 32 2c 42 4c 2c | 42 53 29 0d 07 12 1c 70 |2,Y2,BL,|BS)....p|
|00001490| 74 72 25 3d 28 62 6c 6f | 63 6b 25 2b 38 38 2b 28 |tr%=(blo|ck%+88+(|
|000014a0| 4e 25 2a 33 32 29 29 0d | 07 1c 0c 21 70 74 72 25 |N%*32)).|...!ptr%|
|000014b0| 3d 58 31 0d 07 26 0d 70 | 74 72 25 21 34 3d 59 31 |=X1..&.p|tr%!4=Y1|
|000014c0| 0d 07 30 0d 70 74 72 25 | 21 38 3d 58 32 0d 07 3a |..0.ptr%|!8=X2..:|
|000014d0| 0e 70 74 72 25 21 31 32 | 3d 59 32 0d 07 44 1b 70 |.ptr%!12|=Y2..D.p|
|000014e0| 74 72 25 21 31 36 3d 26 | 37 30 30 46 31 30 44 2b |tr%!16=&|700F10D+|
|000014f0| 28 31 3c 3c 35 29 0d 07 | 4e 26 70 74 72 25 21 32 |(1<<5)..|N&ptr%!2|
|00001500| 30 3d 42 4c 3a 70 74 72 | 25 21 32 34 3d 2d 31 3a |0=BL:ptr|%!24=-1:|
|00001510| 70 74 72 25 21 32 38 3d | 42 53 3a e1 0d 07 58 16 |ptr%!28=|BS:...X.|
|00001520| dd f2 54 69 63 6f 6e 28 | 4e 25 2c 58 2c 59 2c 54 |..Ticon(|N%,X,Y,T|
|00001530| 24 29 0d 07 62 1c 70 74 | 72 25 3d 28 62 6c 6f 63 |$)..b.pt|r%=(bloc|
|00001540| 6b 25 2b 38 38 2b 28 4e | 25 2a 33 32 29 29 0d 07 |k%+88+(N|%*32))..|
|00001550| 6c 0b 21 70 74 72 25 3d | 58 0d 07 76 0c 70 74 72 |l.!ptr%=|X..v.ptr|
|00001560| 25 21 34 3d 59 0d 07 80 | 16 70 74 72 25 21 38 3d |%!4=Y...|.ptr%!8=|
|00001570| 58 2b 31 36 2a a9 54 24 | 2b 31 36 0d 07 8a 10 70 |X+16*.T$|+16....p|
|00001580| 74 72 25 21 31 32 3d 59 | 2b 33 32 0d 07 94 12 70 |tr%!12=Y|+32....p|
|00001590| 74 72 25 21 31 36 3d 74 | 66 6c 61 67 25 0d 07 9e |tr%!16=t|flag%...|
|000015a0| 13 24 28 70 74 72 25 2b | 32 30 29 3d 54 24 3a e1 |.$(ptr%+|20)=T$:.|
|000015b0| 0d 07 a8 10 dd f2 69 6e | 66 6f 77 69 6e 64 6f 77 |......in|fowindow|
|000015c0| 0d 07 b2 1f f2 54 69 63 | 6f 6e 28 30 2c 33 32 2c |.....Tic|on(0,32,|
|000015d0| 31 37 36 2c 22 4e 61 6d | 65 20 20 20 3a 22 29 0d |176,"Nam|e :").|
|000015e0| 07 bc 1f f2 54 69 63 6f | 6e 28 31 2c 33 32 2c 31 |....Tico|n(1,32,1|
|000015f0| 32 30 2c 22 50 75 72 70 | 6f 73 65 3a 22 29 0d 07 |20,"Purp|ose:")..|
|00001600| c6 1e f2 54 69 63 6f 6e | 28 32 2c 33 32 2c 36 34 |...Ticon|(2,32,64|
|00001610| 2c 22 41 75 74 68 6f 72 | 20 3a 22 29 0d 07 d0 1d |,"Author| :")....|
|00001620| f2 54 69 63 6f 6e 28 33 | 2c 33 32 2c 38 2c 22 56 |.Ticon(3|,32,8,"V|
|00001630| 65 72 73 69 6f 6e 3a 22 | 29 0d 07 da 30 24 70 6e |ersion:"|)...0$pn|
|00001640| 6d 3d 22 46 69 6c 65 20 | 46 69 6e 64 65 72 22 3a |m="File |Finder":|
|00001650| f2 42 69 63 6f 6e 28 34 | 2c 31 39 36 2c 31 37 36 |.Bicon(4|,196,176|
|00001660| 2c 35 35 30 2c 70 6e 6d | 29 0d 07 e4 32 24 70 70 |,550,pnm|)...2$pp|
|00001670| 73 3d 22 46 69 6c 65 20 | 53 65 61 72 63 68 65 72 |s="File |Searcher|
|00001680| 22 3a f2 42 69 63 6f 6e | 28 35 2c 31 39 36 2c 31 |":.Bicon|(5,196,1|
|00001690| 32 30 2c 35 35 30 2c 70 | 70 73 29 0d 07 ee 30 24 |20,550,p|ps)...0$|
|000016a0| 61 75 74 3d 22 41 6e 64 | 72 65 77 20 56 61 77 65 |aut="And|rew Vawe|
|000016b0| 72 22 3a f2 42 69 63 6f | 6e 28 36 2c 31 39 36 2c |r":.Bico|n(6,196,|
|000016c0| 36 34 2c 35 35 30 2c 61 | 75 74 29 0d 07 f8 34 24 |64,550,a|ut)...4$|
|000016d0| 76 65 72 3d 22 31 2e 33 | 30 20 28 33 31 20 4f 63 |ver="1.3|0 (31 Oc|
|000016e0| 74 20 27 38 39 29 22 3a | f2 42 69 63 6f 6e 28 37 |t '89)":|.Bicon(7|
|000016f0| 2c 31 39 36 2c 38 2c 35 | 35 30 2c 76 65 72 29 0d |,196,8,5|50,ver).|
|00001700| 08 02 3a 69 6e 66 6f 25 | 3d a4 63 72 65 61 74 65 |..:info%|=.create|
|00001710| 77 69 6e 64 6f 77 28 69 | 6e 74 2c 31 34 37 2c 37 |window(i|nt,147,7|
|00001720| 2c 31 2c 35 38 30 2c 32 | 33 32 2c 30 2c 30 2c 35 |,1,580,2|32,0,0,5|
|00001730| 38 30 2c 32 38 38 2c 38 | 29 0d 08 0c 05 e1 0d 08 |80,288,8|).......|
|00001740| 16 12 dd f2 73 65 61 72 | 63 68 77 69 6e 64 6f 77 |....sear|chwindow|
|00001750| 0d 08 20 1d f2 54 69 63 | 6f 6e 28 30 2c 36 34 2c |.. ..Tic|on(0,64,|
|00001760| 33 32 30 2c 22 44 69 73 | 63 20 3a 22 29 0d 08 2a |320,"Dis|c :")..*|
|00001770| 1d f2 54 69 63 6f 6e 28 | 31 2c 36 34 2c 32 35 36 |..Ticon(|1,64,256|
|00001780| 2c 22 46 69 6c 65 20 3a | 22 29 0d 08 34 1f f2 42 |,"File :|")..4..B|
|00001790| 69 63 6f 6e 28 32 2c 31 | 37 36 2c 33 32 30 2c 32 |icon(2,1|76,320,2|
|000017a0| 35 36 2c 64 72 69 76 65 | 29 0d 08 3e 2a f2 62 75 |56,drive|)..>*.bu|
|000017b0| 74 74 6f 6e 28 33 2c bd | 31 33 36 2c 32 38 38 2c |tton(3,.|136,288,|
|000017c0| 33 32 30 2c 33 32 30 2c | 33 36 34 2c 37 2c 31 34 |320,320,|364,7,14|
|000017d0| 2c 33 29 0d 08 48 2a f2 | 62 75 74 74 6f 6e 28 34 |,3)..H*.|button(4|
|000017e0| 2c bd 31 33 37 2c 33 35 | 32 2c 33 32 30 2c 33 38 |,.137,35|2,320,38|
|000017f0| 34 2c 33 36 34 2c 37 2c | 31 34 2c 33 29 0d 08 52 |4,364,7,|14,3)..R|
|00001800| 25 f2 57 69 63 6f 6e 28 | 35 2c 31 37 36 2c 32 35 |%.Wicon(|5,176,25|
|00001810| 36 2c 33 38 34 2c 33 30 | 30 2c 66 69 6c 65 2c 31 |6,384,30|0,file,1|
|00001820| 31 29 0d 08 5c 27 f2 62 | 75 74 74 6f 6e 28 36 2c |1)..\'.b|utton(6,|
|00001830| 22 4f 4b 22 2c 31 32 38 | 2c 33 32 2c 33 32 30 2c |"OK",128|,32,320,|
|00001840| 37 36 2c 37 2c 39 2c 34 | 29 0d 08 66 21 f2 54 69 |76,7,9,4|)..f!.Ti|
|00001850| 63 6f 6e 28 37 2c 31 32 | 38 2c 39 36 2c 22 50 61 |con(7,12|8,96,"Pa|
|00001860| 67 65 64 20 6d 6f 64 65 | 22 29 0d 08 70 20 f2 54 |ged mode|")..p .T|
|00001870| 69 63 6f 6e 28 38 2c 31 | 32 38 2c 31 34 36 2c 22 |icon(8,1|28,146,"|
|00001880| 50 72 69 6e 74 6f 75 74 | 22 29 0d 08 7a 1b f2 53 |Printout|")..z..S|
|00001890| 62 75 74 74 6f 6e 28 39 | 2c 36 34 2c 39 36 2c 70 |button(9|,64,96,p|
|000018a0| 6d 6f 64 65 29 0d 08 84 | 1c f2 53 62 75 74 74 6f |mode)...|..Sbutto|
|000018b0| 6e 28 31 30 2c 36 34 2c | 31 34 36 2c 70 6f 75 74 |n(10,64,|146,pout|
|000018c0| 29 0d 08 8e 21 f2 54 69 | 63 6f 6e 28 31 31 2c 31 |)...!.Ti|con(11,1|
|000018d0| 36 2c 32 30 30 2c 22 52 | 6f 6f 74 20 64 69 72 3a |6,200,"R|oot dir:|
|000018e0| 22 29 0d 08 98 27 f2 57 | 69 63 6f 6e 28 31 32 2c |")...'.W|icon(12,|
|000018f0| 31 37 36 2c 32 30 30 2c | 33 38 34 2c 32 34 34 2c |176,200,|384,244,|
|00001900| 72 64 69 72 2c 31 30 31 | 29 0d 08 a2 3c 73 65 61 |rdir,101|)...<sea|
|00001910| 72 63 68 25 3d a4 63 72 | 65 61 74 65 77 69 6e 64 |rch%=.cr|eatewind|
|00001920| 6f 77 28 53 54 2c 31 34 | 37 2c 37 2c 31 2c 34 34 |ow(ST,14|7,7,1,44|
|00001930| 38 2c 33 38 36 2c 30 2c | 30 2c 34 34 38 2c 33 38 |8,386,0,|0,448,38|
|00001940| 36 2c 31 33 29 0d 08 ac | 05 e1 0d 08 b6 18 dd f2 |6,13)...|........|
|00001950| 42 69 63 6f 6e 28 4e 25 | 2c 58 2c 59 2c 4d 58 2c |Bicon(N%|,X,Y,MX,|
|00001960| 54 29 0d 08 c0 1c 70 74 | 72 25 3d 28 62 6c 6f 63 |T)....pt|r%=(bloc|
|00001970| 6b 25 2b 38 38 2b 28 4e | 25 2a 33 32 29 29 0d 08 |k%+88+(N|%*32))..|
|00001980| ca 0b 21 70 74 72 25 3d | 58 0d 08 d4 0c 70 74 72 |..!ptr%=|X....ptr|
|00001990| 25 21 34 3d 59 0d 08 de | 0d 70 74 72 25 21 38 3d |%!4=Y...|.ptr%!8=|
|000019a0| 4d 58 0d 08 e8 10 70 74 | 72 25 21 31 32 3d 59 2b |MX....pt|r%!12=Y+|
|000019b0| 34 34 0d 08 f2 16 70 74 | 72 25 21 31 36 3d 74 66 |44....pt|r%!16=tf|
|000019c0| 6c 61 67 25 2b 33 30 30 | 0d 08 fc 26 70 74 72 25 |lag%+300|...&ptr%|
|000019d0| 21 32 30 3d 54 3a 70 74 | 72 25 21 32 34 3d 2d 31 |!20=T:pt|r%!24=-1|
|000019e0| 3a 70 74 72 25 21 32 38 | 3d a9 24 54 3a e1 0d 09 |:ptr%!28|=.$T:...|
|000019f0| 06 23 dd f2 62 75 74 74 | 6f 6e 28 49 25 2c 42 24 |.#..butt|on(I%,B$|
|00001a00| 2c 58 2c 59 2c 57 2c 48 | 2c 66 63 2c 62 63 2c 50 |,X,Y,W,H|,fc,bc,P|
|00001a10| 29 0d 09 10 18 70 74 72 | 25 3d 62 6c 6f 63 6b 25 |)....ptr|%=block%|
|00001a20| 2b 38 38 2b 33 32 2a 49 | 25 0d 09 1a 4c 21 70 74 |+88+32*I|%...L!pt|
|00001a30| 72 25 3d 58 3a 70 74 72 | 25 21 34 3d 59 3a 70 74 |r%=X:ptr|%!4=Y:pt|
|00001a40| 72 25 21 38 3d 57 3a 70 | 74 72 25 21 31 32 3d 48 |r%!8=W:p|tr%!12=H|
|00001a50| 3a 70 74 72 25 21 31 36 | 3d 34 35 2b 28 50 3c 3c |:ptr%!16|=45+(P<<|
|00001a60| 31 32 29 2b 28 66 63 3c | 3c 32 34 29 2b 28 62 63 |12)+(fc<|<24)+(bc|
|00001a70| 3c 3c 32 38 29 0d 09 24 | 11 24 28 70 74 72 25 2b |<<28)..$|.$(ptr%+|
|00001a80| 32 30 29 3d 42 24 0d 09 | 2e 05 e1 0d 09 38 0d dd |20)=B$..|.....8..|
|00001a90| f2 65 72 72 28 45 24 29 | 0d 09 42 2a e7 9f 3d 36 |.err(E$)|..B*..=6|
|00001aa0| 37 37 39 38 20 45 24 3d | 22 52 6f 6f 74 20 64 69 |7798 E$=|"Root di|
|00001ab0| 72 65 63 74 6f 72 79 20 | 6e 6f 74 20 66 6f 75 6e |rectory |not foun|
|00001ac0| 64 22 0d 09 4c 0d 21 65 | 72 62 6c 6b 25 3d 30 0d |d"..L.!e|rblk%=0.|
|00001ad0| 09 56 12 24 28 65 72 62 | 6c 6b 25 2b 34 29 3d 45 |.V.$(erb|lk%+4)=E|
|00001ae0| 24 0d 09 60 2e c8 99 22 | 57 69 6d 70 5f 52 65 70 |$..`..."|Wimp_Rep|
|00001af0| 6f 72 74 45 72 72 6f 72 | 22 2c 65 72 62 6c 6b 25 |ortError|",erblk%|
|00001b00| 2c 2c 22 46 69 6c 65 20 | 46 69 6e 64 65 72 22 0d |,,"File |Finder".|
|00001b10| 09 6a 05 e1 0d 09 74 0b | dd f2 72 73 72 63 68 0d |.j....t.|..rsrch.|
|00001b20| 09 7e 13 21 62 6c 6f 63 | 6b 25 3d 73 65 61 72 63 |.~.!bloc|k%=searc|
|00001b30| 68 25 0d 09 88 0e 62 6c | 6f 63 6b 25 21 34 3d 32 |h%....bl|ock%!4=2|
|00001b40| 0d 09 92 0e 62 6c 6f 63 | 6b 25 21 38 3d 30 0d 09 |....bloc|k%!8=0..|
|00001b50| 9c 0f 62 6c 6f 63 6b 25 | 21 31 32 3d 30 0d 09 a6 |..block%|!12=0...|
|00001b60| 21 c8 99 22 57 69 6d 70 | 5f 53 65 74 49 63 6f 6e |!.."Wimp|_SetIcon|
|00001b70| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 09 |State",,|block%..|
|00001b80| b0 05 e1 0d 09 ba 0a dd | f2 66 69 6e 64 0d 09 c4 |........|.find...|
|00001b90| 2e e7 20 24 66 69 6c 65 | 3d 22 22 20 85 20 31 2c |.. $file|="" . 1,|
|00001ba0| 22 59 6f 75 20 6d 75 73 | 74 20 65 6e 74 65 72 20 |"You mus|t enter |
|00001bb0| 61 20 66 69 6c 65 6e 61 | 6d 65 22 0d 09 ce 3a e7 |a filena|me"...:.|
|00001bc0| 20 a7 24 66 69 6c 65 2c | 22 2e 22 29 20 85 20 31 | .$file,|".") . 1|
|00001bd0| 2c 22 59 6f 75 20 63 61 | 6e 27 74 20 73 70 65 63 |,"You ca|n't spec|
|00001be0| 69 66 79 20 64 69 72 65 | 63 74 6f 72 69 65 73 20 |ify dire|ctories |
|00001bf0| 68 65 72 65 22 0d 09 d8 | 36 e7 20 24 72 64 69 72 |here"...|6. $rdir|
|00001c00| 3d 22 22 20 85 20 31 2c | 22 59 6f 75 20 6d 75 73 |="" . 1,|"You mus|
|00001c10| 74 20 73 70 65 63 69 66 | 79 20 61 20 72 6f 6f 74 |t specif|y a root|
|00001c20| 20 64 69 72 65 63 74 6f | 72 79 22 0d 09 e2 09 2a | directo|ry"....*|
|00001c30| 41 44 46 53 0d 09 ec 4c | e7 24 64 72 69 76 65 3d |ADFS...L|.$drive=|
|00001c40| 22 52 41 4d 22 20 64 24 | 3d 22 72 61 6d 3a 22 20 |"RAM" d$|="ram:" |
|00001c50| 8b e7 24 64 72 69 76 65 | 3d 22 4e 45 54 22 20 64 |..$drive|="NET" d|
|00001c60| 24 3d 22 6e 65 74 3a 22 | 20 8b 20 64 24 3d 22 61 |$="net:"| . d$="a|
|00001c70| 64 66 73 3a 22 2b 24 64 | 72 69 76 65 2b 22 2e 22 |dfs:"+$d|rive+"."|
|00001c80| 0d 09 f6 2e 24 74 69 74 | 6c 65 3d 22 53 65 61 72 |....$tit|le="Sear|
|00001c90| 63 68 69 6e 67 20 22 2b | 64 24 2b 24 72 64 69 72 |ching "+|d$+$rdir|
|00001ca0| 2b 22 20 66 6f 72 20 22 | 2b 24 66 69 6c 65 0d 0a |+" for "|+$file..|
|00001cb0| 00 3a 64 69 73 3d a4 63 | 72 65 61 74 65 77 69 6e |.:dis=.c|reatewin|
|00001cc0| 64 6f 77 28 74 69 74 6c | 65 2c 31 34 37 2c 37 2c |dow(titl|e,147,7,|
|00001cd0| 30 2c 38 30 30 2c 35 30 | 30 2c 30 2c 30 2c 38 30 |0,800,50|0,0,0,80|
|00001ce0| 30 2c 35 30 30 2c 30 29 | 0d 0a 0a 0c 6d 6f 70 65 |0,500,0)|....mope|
|00001cf0| 6e 25 3d b9 0d 0a 14 2b | f2 6f 70 65 6e 77 69 6e |n%=....+|.openwin|
|00001d00| 64 6f 77 28 64 69 73 2c | 30 2c 30 2c 38 30 30 2c |dow(dis,|0,0,800,|
|00001d10| 35 30 30 2c 31 39 32 2c | 37 33 36 2c 2d 31 29 0d |500,192,|736,-1).|
|00001d20| 0a 1e 0c 6d 6f 70 65 6e | 25 3d a3 0d 0a 28 0e f2 |...mopen|%=...(..|
|00001d30| 72 65 64 6f 28 64 69 73 | 29 0d 0a 32 14 ef 32 38 |redo(dis|)..2..28|
|00001d40| 2c 31 32 2c 32 33 2c 36 | 30 2c 39 2c 34 0d 0a 3c |,12,23,6|0,9,4..<|
|00001d50| 1c e7 20 24 70 6d 6f 64 | 65 3d 22 79 65 73 22 20 |.. $pmod|e="yes" |
|00001d60| ef 31 34 20 8b 20 ef 31 | 35 0d 0a 46 13 e7 20 24 |.14 . .1|5..F.. $|
|00001d70| 70 6f 75 74 3d 22 79 65 | 73 22 20 8c 0d 0a 50 5b |pout="ye|s" ...P[|
|00001d80| e7 20 ac 20 a4 63 70 20 | 21 62 6c 6f 63 6b 25 3d |. . .cp |!block%=|
|00001d90| 64 69 73 3a c8 99 22 57 | 69 6d 70 5f 44 65 6c 65 |dis:.."W|imp_Dele|
|00001da0| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |teWindow|",,block|
|00001db0| 25 3a 64 69 73 3d 2d 31 | 3a f2 65 72 72 28 22 50 |%:dis=-1|:.err("P|
|00001dc0| 72 69 6e 74 65 72 20 6e | 6f 74 20 6f 6e 20 6c 69 |rinter n|ot on li|
|00001dd0| 6e 65 2e 22 29 3a e1 0d | 0a 5a 06 ef 32 0d 0a 64 |ne."):..|.Z..2..d|
|00001de0| 2a f1 22 53 65 61 72 63 | 68 69 6e 67 20 22 3b 64 |*."Searc|hing ";d|
|00001df0| 24 3b 24 72 64 69 72 3b | 22 20 66 6f 72 20 22 3b |$;$rdir;|" for ";|
|00001e00| 24 66 69 6c 65 27 27 0d | 0a 6e 05 cd 0d 0a 78 12 |$file''.|.n....x.|
|00001e10| 64 69 72 24 3d 24 72 64 | 69 72 2b 22 2e 22 0d 0a |dir$=$rd|ir+"."..|
|00001e20| 82 39 e7 24 64 72 69 76 | 65 3d 22 52 41 4d 22 20 |.9.$driv|e="RAM" |
|00001e30| 84 20 24 64 72 69 76 65 | 3d 22 4e 45 54 22 20 ff |. $drive|="NET" .|
|00001e40| 24 64 72 69 76 65 20 8b | 20 ff 22 44 69 72 20 22 |$drive .| ."Dir "|
|00001e50| 2b 24 64 72 69 76 65 0d | 0a 8c 11 ff 22 44 69 72 |+$drive.|...."Dir|
|00001e60| 20 22 2b 24 72 64 69 72 | 0d 0a 96 39 66 6f 75 6e | "+$rdir|...9foun|
|00001e70| 64 25 3d 30 3a f2 73 65 | 61 72 63 68 3a f1 27 3b |d%=0:.se|arch:.';|
|00001e80| 66 6f 75 6e 64 25 3b 22 | 20 66 69 6c 65 22 3b 3a |found%;"| file";:|
|00001e90| e7 66 6f 75 6e 64 25 3c | 3e 31 20 f1 3b 22 73 22 |.found%<|>1 .;"s"|
|00001ea0| 3b 0d 0a a0 2d f1 3b 22 | 20 66 6f 75 6e 64 2e 22 |;...-.;"| found."|
|00001eb0| 27 bd 33 22 43 6c 69 63 | 6b 20 53 65 6c 65 63 74 |'.3"Clic|k Select|
|00001ec0| 20 74 6f 20 63 6f 6e 74 | 69 6e 75 65 2e 22 0d 0a | to cont|inue."..|
|00001ed0| aa 06 ef 35 0d 0a b4 17 | f5 c8 97 41 2c 42 2c 43 |...5....|...A,B,C|
|00001ee0| 3a fd 28 43 20 80 20 34 | 29 3d 34 0d 0a be 34 21 |:.(C . 4|)=4...4!|
|00001ef0| 62 6c 6f 63 6b 25 3d 64 | 69 73 3a c8 99 22 57 69 |block%=d|is:.."Wi|
|00001f00| 6d 70 5f 44 65 6c 65 74 | 65 57 69 6e 64 6f 77 22 |mp_Delet|eWindow"|
|00001f10| 2c 2c 62 6c 6f 63 6b 25 | 3a 64 69 73 3d 2d 31 0d |,,block%|:dis=-1.|
|00001f20| 0a c8 09 2a 41 44 46 53 | 0d 0a d2 0a 2a 4d 4f 55 |...*ADFS|....*MOU|
|00001f30| 4e 54 0d 0a dc 05 e1 0d | 0a e6 0c dd f2 73 65 61 |NT......|.....sea|
|00001f40| 72 63 68 0d 0a f0 30 e7 | 62 6c 6f 63 6b 3d 62 6d |rch...0.|block=bm|
|00001f50| 61 78 20 85 20 31 2c 22 | 54 6f 6f 20 6d 61 6e 79 |ax . 1,"|Too many|
|00001f60| 20 64 69 72 65 63 74 6f | 72 79 20 6c 65 76 65 6c | directo|ry level|
|00001f70| 73 2e 22 0d 0a fa 19 ea | 20 71 2c 6f 62 6a 2c 72 |s.".....| q,obj,r|
|00001f80| 65 61 64 2c 74 70 2c 5a | 24 2c 64 4c 0d 0b 04 0d |ead,tp,Z|$,dL....|
|00001f90| f2 63 68 65 63 6b 64 69 | 72 0d 0b 0e 33 c8 99 20 |.checkdi|r...3.. |
|00001fa0| 22 4f 53 5f 47 42 50 42 | 22 2c 31 30 2c 22 22 2c |"OS_GBPB|",10,"",|
|00001fb0| 62 6c 6f 63 6b 2c 37 37 | 2c 30 2c 32 30 34 38 2c |block,77|,0,2048,|
|00001fc0| 22 2a 22 20 b8 20 2c 2c | 2c 6f 62 6a 0d 0b 18 12 |"*" . ,,|,obj....|
|00001fd0| e7 6f 62 6a 3d 30 20 ff | 22 55 50 22 3a e1 0d 0b |.obj=0 .|"UP":...|
|00001fe0| 22 0b 71 3d 62 6c 6f 63 | 6b 0d 0b 2c 11 e3 72 65 |".q=bloc|k..,..re|
|00001ff0| 61 64 3d 30 b8 6f 62 6a | 2d 31 0d 0b 36 0a 71 2b |ad=0.obj|-1..6.q+|
|00002000| 3d 26 31 30 0d 0b 40 09 | 74 70 3d 21 71 0d 0b 4a |=&10..@.|tp=!q..J|
|00002010| 08 71 2b 3d 34 0d 0b 54 | 1d 5a 24 3d 22 22 3a f5 |.q+=4..T|.Z$="":.|
|00002020| 5a 24 2b 3d bd 3f 71 3a | 71 2b 3d 31 3a fd 3f 71 |Z$+=.?q:|q+=1:.?q|
|00002030| 3d 30 0d 0b 5e 10 71 3d | 71 2b 28 34 2d 71 20 83 |=0..^.q=|q+(4-q .|
|00002040| 34 29 0d 0b 68 59 e7 74 | 70 3d 32 20 ff 22 44 49 |4)..hY.t|p=2 ."DI|
|00002050| 52 20 22 2b 5a 24 3a 64 | 4c 3d a9 64 69 72 24 3a |R "+Z$:d|L=.dir$:|
|00002060| 64 69 72 24 2b 3d 5a 24 | 2b 22 2e 22 3a 62 6c 6f |dir$+=Z$|+".":blo|
|00002070| 63 6b 2b 3d 32 30 34 38 | 3a f2 73 65 61 72 63 68 |ck+=2048|:.search|
|00002080| 3a 62 6c 6f 63 6b 2d 3d | 32 30 34 38 3a 64 69 72 |:block-=|2048:dir|
|00002090| 24 3d c0 64 69 72 24 2c | 64 4c 29 0d 0b 72 05 ed |$=.dir$,|dL)..r..|
|000020a0| 0d 0b 7c 07 2a 55 50 0d | 0b 86 05 e1 0d 0b 90 0e |..|.*UP.|........|
|000020b0| dd f2 63 68 65 63 6b 64 | 69 72 0d 0b 9a 1a ea 20 |..checkd|ir..... |
|000020c0| 71 32 2c 6f 62 6a 32 2c | 4e 32 2c 5a 32 24 2c 74 |q2,obj2,|N2,Z2$,t|
|000020d0| 25 2c 74 24 0d 0b a4 35 | c8 99 22 4f 53 5f 47 42 |%,t$...5|.."OS_GB|
|000020e0| 50 42 22 2c 39 2c 22 22 | 2c 62 6c 6f 63 6b 32 2c |PB",9,""|,block2,|
|000020f0| 37 37 2c 30 2c 31 30 32 | 34 2c 24 66 69 6c 65 20 |77,0,102|4,$file |
|00002100| b8 20 2c 2c 2c 6f 62 6a | 32 0d 0b ae 1c e7 6f 62 |. ,,,obj|2.....ob|
|00002110| 6a 32 3d 30 20 e1 20 8b | 20 66 6f 75 6e 64 25 2b |j2=0 . .| found%+|
|00002120| 3d 6f 62 6a 32 0d 0b b8 | 0d 71 32 3d 62 6c 6f 63 |=obj2...|.q2=bloc|
|00002130| 6b 32 0d 0b c2 10 e3 4e | 32 3d 30 b8 6f 62 6a 32 |k2.....N|2=0.obj2|
|00002140| 2d 31 0d 0b cc 22 5a 32 | 24 3d 22 22 3a f5 5a 32 |-1..."Z2|$="":.Z2|
|00002150| 24 2b 3d bd 3f 71 32 3a | 71 32 2b 3d 31 3a fd 3f |$+=.?q2:|q2+=1:.?|
|00002160| 71 32 3d 30 0d 0b d6 20 | e7 c0 5a 32 24 2c 31 29 |q2=0... |..Z2$,1)|
|00002170| 3d bd 30 20 5a 32 24 3d | c2 5a 32 24 2c a9 5a 32 |=.0 Z2$=|.Z2$,.Z2|
|00002180| 24 2d 31 29 0d 0b e0 3f | c8 99 22 4f 53 5f 46 69 |$-1)...?|.."OS_Fi|
|00002190| 6c 65 22 2c 26 31 31 2c | 64 69 72 24 2b 5a 32 24 |le",&11,|dir$+Z2$|
|000021a0| 20 b8 20 74 25 3a e7 28 | 74 25 80 33 29 3d 32 20 | . t%:.(|t%.3)=2 |
|000021b0| 74 24 3d 22 20 28 44 69 | 72 29 22 20 8b 20 74 24 |t$=" (Di|r)" . t$|
|000021c0| 3d 22 22 0d 0b ea 0e f1 | 64 69 72 24 5a 32 24 74 |="".....|dir$Z2$t|
|000021d0| 24 0d 0b f4 05 ed 0d 0b | fe 05 e1 0d 0c 08 26 dd |$.......|......&.|
|000021e0| f2 6f 70 65 6e 77 69 6e | 64 6f 77 28 48 2c 58 2c |.openwin|dow(H,X,|
|000021f0| 59 2c 58 58 2c 59 59 2c | 53 58 2c 53 59 2c 48 32 |Y,XX,YY,|SX,SY,H2|
|00002200| 29 0d 0c 12 a8 21 62 6c | 6f 63 6b 25 3d 48 3a e7 |)....!bl|ock%=H:.|
|00002210| 20 6d 6f 70 65 6e 25 20 | 62 6c 6f 63 6b 25 21 34 | mopen% |block%!4|
|00002220| 3d 58 2b 53 58 3a 62 6c | 6f 63 6b 25 21 38 3d 59 |=X+SX:bl|ock%!8=Y|
|00002230| 2b 53 59 2d 59 59 2b 59 | 3a 62 6c 6f 63 6b 25 21 |+SY-YY+Y|:block%!|
|00002240| 31 32 3d 58 58 2b 53 58 | 3a 62 6c 6f 63 6b 25 21 |12=XX+SX|:block%!|
|00002250| 31 36 3d 59 59 2b 53 59 | 2d 59 59 2b 59 3a 62 6c |16=YY+SY|-YY+Y:bl|
|00002260| 6f 63 6b 25 21 32 30 3d | 53 58 3a 62 6c 6f 63 6b |ock%!20=|SX:block|
|00002270| 25 21 32 34 3d 53 59 20 | 8b 20 62 6c 6f 63 6b 25 |%!24=SY |. block%|
|00002280| 21 34 3d 58 3a 62 6c 6f | 63 6b 25 21 38 3d 59 3a |!4=X:blo|ck%!8=Y:|
|00002290| 62 6c 6f 63 6b 25 21 31 | 32 3d 58 58 3a 62 6c 6f |block%!1|2=XX:blo|
|000022a0| 63 6b 25 21 31 36 3d 59 | 59 0d 0c 1c 10 62 6c 6f |ck%!16=Y|Y....blo|
|000022b0| 63 6b 25 21 32 38 3d 48 | 32 0d 0c 26 1f c8 99 22 |ck%!28=H|2..&..."|
|000022c0| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|000022d0| 2c 2c 62 6c 6f 63 6b 25 | 0d 0c 30 05 e1 0d 0c 3a |,,block%|..0....:|
|000022e0| 1f dd f2 6f 70 65 6e 77 | 69 6e 64 6f 77 32 28 68 |...openw|indow2(h|
|000022f0| 61 6e 64 6c 65 25 2c 6d | 65 6d 25 29 0d 0c 44 3e |andle%,m|em%)..D>|
|00002300| e7 6d 65 6d 25 3d 62 6c | 6f 63 6b 25 20 21 6d 65 |.mem%=bl|ock% !me|
|00002310| 6d 25 3d 68 61 6e 64 6c | 65 25 3a c8 99 20 22 57 |m%=handl|e%:.. "W|
|00002320| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00002330| 74 65 22 2c 30 2c 6d 65 | 6d 25 0d 0c 4e 20 c8 99 |te",0,me|m%..N ..|
|00002340| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00002350| 22 2c 30 2c 6d 65 6d 25 | 3a e1 0d 0c 58 0e dd f2 |",0,mem%|:...X...|
|00002360| 63 68 65 63 6b 72 61 6d | 0d 0c 62 0b ea 20 72 61 |checkram|..b.. ra|
|00002370| 6d 66 73 0d 0c 6c 27 c8 | 99 22 4f 53 5f 46 53 43 |mfs..l'.|."OS_FSC|
|00002380| 6f 6e 74 72 6f 6c 22 2c | 31 33 2c 22 52 41 4d 22 |ontrol",|13,"RAM"|
|00002390| 20 b8 20 2c 2c 72 61 6d | 66 73 0d 0c 76 1e e7 20 | . ,,ram|fs..v.. |
|000023a0| 72 61 6d 66 73 3c 3e 30 | 20 6d 69 25 3d 30 3a e1 |ramfs<>0| mi%=0:.|
|000023b0| 20 8b 20 6d 69 25 3d 31 | 0d 0c 80 20 e7 20 64 72 | . mi%=1|... . dr|
|000023c0| 76 25 3d 30 20 64 72 76 | 25 3d 31 3a 24 64 72 69 |v%=0 drv|%=1:$dri|
|000023d0| 76 65 3d 66 24 28 31 29 | 0d 0c 8a 05 e1 0d 0c 94 |ve=f$(1)|........|
|000023e0| 0e dd f2 63 68 65 63 6b | 6e 65 74 0d 0c 9e 27 c8 |...check|net...'.|
|000023f0| 99 22 4f 53 5f 46 53 43 | 6f 6e 74 72 6f 6c 22 2c |."OS_FSC|ontrol",|
|00002400| 31 33 2c 22 4e 45 54 22 | 20 b8 20 2c 2c 6e 65 74 |13,"NET"| . ,,net|
|00002410| 66 73 0d 0c a8 23 e7 20 | 6e 65 74 66 73 3c 3e 30 |fs...#. |netfs<>0|
|00002420| 20 6d 61 25 2b 3d 31 3a | 66 24 28 6d 61 25 29 3d | ma%+=1:|f$(ma%)=|
|00002430| 22 4e 45 54 22 0d 0c b2 | 05 e1 0d 0c bc 18 dd f2 |"NET"...|........|
|00002440| 53 62 75 74 74 6f 6e 28 | 49 25 2c 58 2c 59 2c 53 |Sbutton(|I%,X,Y,S|
|00002450| 4c 29 0d 0c c6 1a 70 74 | 72 25 3d 62 6c 6f 63 6b |L)....pt|r%=block|
|00002460| 25 2b 38 38 2b 28 33 32 | 2a 49 25 29 0d 0c d0 14 |%+88+(32|*I%)....|
|00002470| 21 70 74 72 25 3d 58 3a | 70 74 72 25 21 34 3d 59 |!ptr%=X:|ptr%!4=Y|
|00002480| 0d 0c da 0f 70 74 72 25 | 21 38 3d 58 2b 38 30 0d |....ptr%|!8=X+80.|
|00002490| 0c e4 10 70 74 72 25 21 | 31 32 3d 59 2b 34 30 0d |...ptr%!|12=Y+40.|
|000024a0| 0c ee 21 70 74 72 25 21 | 31 36 3d 28 31 3c 3c 31 |..!ptr%!|16=(1<<1|
|000024b0| 29 2b 28 31 3c 3c 38 29 | 2b 28 32 3c 3c 31 32 29 |)+(1<<8)|+(2<<12)|
|000024c0| 0d 0c f8 0e 70 74 72 25 | 21 32 30 3d 53 4c 0d 0d |....ptr%|!20=SL..|
|000024d0| 02 0e 70 74 72 25 21 32 | 34 3d 2d 31 0d 0d 0c 10 |..ptr%!2|4=-1....|
|000024e0| 70 74 72 25 21 32 38 3d | a9 24 53 4c 0d 0d 16 05 |ptr%!28=|.$SL....|
|000024f0| e1 0d 0d 20 08 dd a4 63 | 70 0d 0d 2a 19 51 25 3d |... ...c|p..*.Q%=|
|00002500| 96 28 2d 34 29 3a ef 32 | 2c 31 2c 30 2c 31 2c 30 |.(-4):.2|,1,0,1,0|
|00002510| 2c 33 0d 0d 34 13 e7 51 | 25 3c 3e 96 28 2d 34 29 |,3..4..Q|%<>.(-4)|
|00002520| 20 8c 20 3d a3 0d 0d 3e | 06 3d b9 0d ff | . =...>|.=... |
+--------+-------------------------+-------------------------+--------+--------+